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This is a feature of MIDAS which facilitates the rapid writing 
and debugging of programs Involving sruch numerical calculation. 
The statements used are ALGOL- like and easy to interpret. 



An arithmetic-statement expander: 

Since the Incompataole Timesharing oystem (ITS) does 
not support an ALGOL style compiler end LISP is so 
cumbersome in dealing with arithmetic statements, it 
is very tedious to perform even the simplest algorithms 
of numerical analysis. To alleviate this problem 
without an inordinate amount of effort, two pseudo-o^a 
where added to MIDAS (The macro-asseuibly language). 

The pseudo-ops are .P and -I- The first uf these will 
have the arithmetic in the arithmetic statement following 
it performed in floating point, the latter in fixed 
point. 

Each statement is treated without reference to any 
of the others. Spaces may appear in a abatement almost 
everywhere and are ignored. Exceptions are in the 
continue part of a continuation statement and in a 
subscript. (See later on) 

Arithmetic statements are combinations of variable 
names, numbers, function names anu operators. Normally 
each statement specifies the calculation of wad or 
more values and %;hera they era to ue stored. 

The operators are: 

A number is a charactei -string starting #ith a numeric 
oharacter (0,1 ... 9) followed by nun-operators. This 
number should wake sense to UIDAS. The opeiator T ia 
permitted to appear in the uuJiber^ belntf t Ue aeperator 
uaaJ lit klkAo for the exponant of a number* 



A variable (or function ) nam* 1** * wuuiJCutti-b^ii^ 

starting *tith a character -nich ib uaithsr frlirtlio 

nor da operator and ounbiBbi* of up tv oi* twit— djitiulrufA* 

/ * + - have the ueuul moaning of ui/iue, *aitl^4^ ( 
aud ana subtract. f ia uaed fur expuuoubiabivji. C ana ) 
are used to force the precedence us u^ual, io. nuxaaai 
evaluation proceeds :Luui ldit iu ri^tit, *itu e^puuentluiionG 
being performed firuti laea multiplication^ auu 
divisions and additiona and subtraction* la^t, except 
that expressions in parentlieues are uv^iuateu first . 
This is strictly sdhexed to and Li.us A f Si C*(A tB)TC 
unlike the FORTRAN convention A'*B"C »A" (B"C). 
Nested p*ira of parentheses die evaluated fror* the 
inside out. 

Intermediate results are kept iu a atacx *hicb has to 
be in the accumulators and is defiued by the user, fheae 
accumulators are called A0,A1 ... A9- If fixed point 
arithmetic ia used Ai 4 AJ 4 1 if i < J . Most commonly 
A0 « 1, Al ■■ 2 etc. Usually only the first few 
accumulators in the stuok are uoed * 

< and > surround the arguments uf a function* The 
arguments are seperated by f 'a. Thus a nana aa defined 
above ia a function name if it ia followed by a < . 
For example: 

V:AX< A-i J 21^:;- . ■ > and IiANDQfcO 

If used not directly following a name,<t>ect exactly 
li*e ( and ). 

Functions return a single value in Ajjf. ±be assembled 
code includes a PUSIiJ P, to the function, the user 
beinR responsible for providing a subroutine *tiich 



accepts the arguments as preaenteu iu AO t AX ulc** 
auttfi not disturb any accumulators other than tLubc 
In tVLixch the arguments tfhere passea -aJ xetuinb Ohe 
result iu A0 before executing a POlJ i>, ■ 

A variable name fullo*ea directly o; a ( is considereu 
to be a vector* The subscript between tiie ( and t:ie 
matching ) can of the following form: 

AC ± mu 

£ HUH * AC 

"■"'.-:- AC la the variable name uf an eccumulscor in 
which the subscript is assumeJ to have been leaded. 
NUlI is a number, acting au a displacement. 

■ Indicates that the value available ut this point 
(as calculated by the portion of the arithmetic 
statement to the right) is to be stored as the value 
of the variable name to its left* Ifore than one » may 
thus appear in one arithmetic statement* For example: 

.F A-B-AHU-LOSS»FOO*BARF 

This invokes the multiplication of POO by BARF, 
storage of the result In LOSS. Next i*0Sti is subtracted 
from ARU and the result stored in both A and B. 
More complicated constructs are possible by making use 
of parentheses. Some care is required in arranging 
the right sequence of storage operations so as not 
to overwrite values needed further on. (Perhaps a 
more intuitive structure could be given to multiple 
equals if one did not adopt tfca rOfrfRAN like 
convention of having the statement Julio* the equals) 






fr permits the paeelng of arguments u^ nam* lather 
than by value, le« is it performs a juoling action. 
Ihle is particularly uaeful Tor auuroutiueo ooeiai-ing 
on vectors (botproduot fur example), or auur^ - ..;& 
executed for tneir effect rather than ■ - . ir value. It 
also permits the passing of a function address as 
an argument. This is achieved oy suirounding the variable 
name *ith [ and 1 - 

3 indicates a continuation and must be uirectly followed 
by a 'return carriage', 'lina feed ' (usually supplied 
by TSGO sny*ay) and either -1 ur .F (which is ignored) 
a space or tab and the continuation of the statement* 
For example: 

•F iNSWEB*275.0/T & 
.F -IN'VBST*MfflIT 

Unitary + and * are ignored. Unitary / and - are 
interpreted aa 1.0/ and 0.0- respectivly. - and ^ 
may not appear unitarily. 

Ginca fi and ' may be part of a variable nainf, one can 
make full use of LClUAS's indirect addressing and 
automatic variable storage assignment conventions* 
The use of S cornea lo very handy when wording with 
multi-dimensional arrays addressed through margin-arrays. 

♦ normally generates a call to a function called 
BXFiiOG. which gets two arguments. To facilitate 
generation of fast inline exponentiation one may follow 
the ♦ directly by the single digits 1,2,2 or 4. For 
example; 

■ F R»S#tT^Xt2 + y *2> 



■ ■:::- unusual constructs are puBdiule *hich are usually 
interpreted as one would intuitivly expect, tor example 
no e ;usls sign need to appear in an expiaaeiou, cue 
result ia than merely left in AO. Next the c-i&foa may 
bo used to force evaluation to take place ia bin; tier 
slues in ttie stack A^,A1 * ■ * AV * So for example: 

• F A'Z,LiSNGrH t S^RT < }&5**t/XSS? f ABbL/CAIi\ 

ia interpreted as meaning the calculation ul obe : .. u 
specified expressions and leaving the results in 
A0, *l t A2 Bnd *'* 

.F .aAVA'-.SAVB'-^SAVC 1 - 

Here A(0 will be stored in SAVA, Al in SAVB etc. 

.1 DI&LIS-#ilCKLST,A«B»C-O t ^bAkK=.KJtSSS 

la duet a convenient way of combining four operations 
An one etataaent.(At this stage)* baa a higher weight 
than t and so the first expression will be carried 
out in A0, the aecond in Al etc. with storage of 
reaulta etartlog at QUAHK and ending at DISLIS. 

The statement expander is not optimal in ite use of 
accumulators f thus small savings in program length 
and execution speed can be had Oy writing the 
preceaence-f orcing parentheses in the right order. 
Por example: 

.P Y-(((A'X+B)'X+C)-X-*brX+E 

uses one accumulator in the stack and the minimal number 
of instructions! -while; 



.F Y«£4X"(HX'(C±X*(B4A*X))) 

uses eight accumulators ia the Steele enu as many extra 
UOVIS instructions - although Che accumulator to accumulator 
instructions used are slightly faster than the storage 
to accumulator instructions used in the first example. 
These examples are rather extreme however and it hardly 
ever pays to worry aouut uuch minor questions of efficiency. 

To use the statement expander on merely uses TaCO as 
usual to create a MIDAS program containing the required 
pseudo-ops - rememoering to define Ap % Al etc. ana the 
push-down accumulator P. Curing the subsequent assembly 
with MIDAS> error messages concerning the arithmetic- 
statement pseudo-ops are presented in an unusual manner* 
The offending statement is typed, with a ^uestionmark 
where the error *as first noticed and an explanation 
of the error on the next line, fro assembled output is 
generated for erroneous statements. 

The standard functions SIW , UOB, ATAN, LOG, tfXP, S^RT, 
ABS, iiPLOG, FRACT, IHTitfr, JO*, KAtij)C« can oe found 
in the file SUPPET HOUT (on DSK: BKPHi)- This file also 
contains floating point input and output routines to 
teletype and printer* Other features are mterupt-handling, 
control character features and a simple command language. 
Most of these features can e exiaed selectivly, using 
switches on the first page of the program * This program in 
intended to be inserted by means of the .INSFT pseudo-op 
and consists of bits and pieces hi£h-jac*ed from 
L.J.Kr**auer t r*61nford t ^.Nelson, K.Greenulat and others. 



